Google
 

Trailing-Edge - PDP-10 Archives - 6.1_emacs_manuals_1er - emacs/xxlib.:ej
There are no other files named xxlib.:ej in the archive.
(W
[0+8+FQ(+4)[1
0FO10F"G+Q1
'W+FQ()+4U1
FQ1"L0'
,Q1:M(Q1+4(]1]0))
  luJWKSBJLS$y	#.29JU`jT[{& Setup XXLIB Library+m.mWordsU...S
m.m^R Control TU.T& Erase ScreenD0f[refresh0f[lines0f[topline
f+f]toplinef]linesf]refresh	WordsL:fr
:i*Zfsechodis
0fsechochar
-(fzsys:words.exe)fz
fsttyinit^R Control Tf[modified
[1[2.f[vbfsz-.f[vz
ff"n'"#fsdate'fsfdconvertwiam 
11r\u1-2d
q1-11"gq1-12u1.+6fp'
.,(q1f"ew12'\)zfx2-d
jegj5ki cfwf(fc)li, 
3kfsloadav[3
\-1*10u1-2dd1a-0"edr'
2cf cq1,q1+10g(:i*January   February  March     April     May       June      July      August    September October   November  December  )
.,(-s 2c).fki192c
i  Used: fsruntimeu1q1/1000\i.
q1-((q1/1000)*1000)\
i  Load: g3i
jg2hfx1
z::i*Cfsechodis
fsrgetty"e@ft
'
@ft10fsechoactive
Decontrollify[2f[bbind
32<izu..2>
95*5,32i
izu..2
15.*5f     
12.*5f     
11.*5f     
33.*5f     
hfx2
f]bbind
zji 
bj
<.-z;
.,zf2
.-3,.+2F=

"n
0a(-di^)#100.i'
>
bj<:s
;r-di^M>
bj<:s
;-di^J>
bj<:s;-di$>
zj-2d
~Filename~	XXLIB~DOC~ ~Filename~Random -*-teco-*- macros.
~DOC~ & Setup XXLIB LibraryS Setup library defaults
~DOC~ & Erase ScreenS clear entire screen.
~DOC~ Words"C Run SYS:WORDS as inferior.
~DOC~ ^R Control T^R Print date-time and load avg. in echo area
A date in FS IF CDATE format can be given as a numeric
argument, to use instead of the current date.
~DOC~ Decontrollify;C Convert control characters to ^<char>, Escapes to $
~DIRECTORY~O& Setup XXLIB Library
& Erase Screen
Words
^R Control T
Decontrollify

~INVERT~[1<Q1-1U1Q1FP;>Q1